Cine Live 59/Cine Live 59.iso/pc/Data/Interface/e3.k

Text File | 2002-06-05 | 24.7 KB | 1,190 lines

module oRoot1 is cBox
with
    Flags is $00000152;
    release Editor:
        IOWindow is {$0000013D,$00000043,$0000029E,$00000378,$00000000,$FFFFFF6E,$00000000,$00000000};
        LayoutWindow is {$000000AD,$000000F9,$0000032F,$00000267,$00000000,$00000000,$00000064,$00000000};
    end;
    Name is "Root";
    Enabled is false;

    Width is 800; Height is 600;


    Elements is [
        oFond2,
        ob13,
        ob24,
        ob35,
        ob46,
        ob57,
        ob68,
        ob79,
        ob810,
        ob911,
        ob1012,
        ob1113,
        ob1214,
        of115,
        of216,
        of317,
        of418,
        of519,
        of620,
        of721,
        of822,
        of923,
        of1024,
        of1125,
        of1226,
        oInternet27,
        ol128,
        ol229,
        oI330,
        oBouton_Fiche32,
        oBouton_Imprimer33,
        oBouton_Sommaire34,
        oBouton_Photos35,
        oBouton_Vid_o36,
        oFiche_Technique37,
        oTexte_RTF38,
        ovid_o39,
        oglobal40
    ];
    Events is [
        cOffscreenEvent
        with
            Commands is [
                cPixelTool_IfSystemCommand
                with
                    Commands is [
                        cSwitchURLCommand
                        with Target is oFond2; URL is "../Images/s3m.jpg"; end,
                        cDragCommand
                        with Target is ovid_o39; Mode is DragTo; X is 631; Y is 442; end,
                        cGrowCommand
                        with Target is ovid_o39; Mode is GrowTo; X is 160; Y is 120; end,
                        cShowCommand
                        with Target is ovid_o39; end,
                        cEnableCommand
                        with Target is ovid_o39; end,
                        cRunCommand
                        with Target is ovid_o39; Rewind is true; end
                    ];
                end,
                cPixelTool_IfSystemCommand
                with SetMode is IsWinTest;
                    Commands is [
                        cDragCommand
                        with Target is ovid_o39; Mode is DragTo; X is 615; Y is 418; end,
                        cGrowCommand
                        with Target is ovid_o39; Mode is GrowTo; X is 176; Y is 144; end,
                        cShowCommand
                        with Target is ovid_o39; end,
                        cEnableCommand
                        with Target is ovid_o39; end,
                        cRunCommand
                        with Target is ovid_o39; Rewind is true; end
                    ];
                end
            ];
        end,
        cKeyboardEvent
        with Test is IsSpace;
            Commands is [
                cRunCommand
                with Flags is $00000004; Target is ovid_o39; Mode is Toggle; end
            ];
        end,
        cKeyboardEvent
        with Value is "+";
            Commands is [
                cSetVolumeCommand
                with Mode is ExecuteHigher; end
            ];
        end,
        cKeyboardEvent
        with Value is "-";
            Commands is [
                cSetVolumeCommand
                with Flags is $00000004; Mode is ExecuteLower; end
            ];
        end,
        cKeyboardEvent
        with Value is "m";
            Commands is [
                cRunCommand
                with Flags is $00000004; Mode is Toggle; Rewind is true; end
            ];
        end
    ];
end;

object oFond2 is cImage
with
    Flags is $00000150;
    Name is "Fond";
    Enabled is false; Cursor is oEmptyCursor;
    AdjustX is AlignToCenter; AdjustY is AlignToTop;
    AdjustWidth is GetDataWidth; AdjustHeight is GetDataHeight;

    URL is "../Images/s3p.jpg";


    Events is [
        cOnscreenEvent
        with Flags is $00000004;
            Commands is [
                cTokenCommand
                with Flags is $00000004; TokenName is "stop"; Mode is ExecuteTargetUpwards; Target is oRoot1; end
            ];
        end
    ];
end;

object ob13 is cImage
with
    Name is "b1";
    Enabled is false; Shown is false;
    X is -21; Y is 166;
    AdjustWidth is GetDataWidth; AdjustHeight is GetDataHeight;

    URL is "../Images/BOUTONV2.psd";
    Bitmapped is false; Mode is 260;

end;

object ob24 is cImage
with
    Name is "b2";
    Enabled is false; Shown is false;
    X is -21; Y is 191;
    AdjustWidth is GetDataWidth; AdjustHeight is GetDataHeight;

    URL is "../Images/BOUTONV2.psd";
    Mode is 260;

end;

object ob35 is cImage
with
    Name is "b3";
    Enabled is false; Shown is false;
    X is -21; Y is 216;
    AdjustWidth is GetDataWidth; AdjustHeight is GetDataHeight;

    URL is "../Images/BOUTONV2.psd";
    Mode is 260;

end;

object ob46 is cImage
with
    release Editor:
        IOWindow is {$000000A3,$0000003E,$0000028F,$000001EF,$00000000,$00000000,$00000000,$00000000};
    end;
    Name is "b4";
    Enabled is false; Shown is false;
    X is -21; Y is 240;
    AdjustWidth is GetDataWidth; AdjustHeight is GetDataHeight;

    URL is "../Images/BOUTONV2.psd";
    Mode is 260;

end;

object ob57 is cImage
with
    release Editor:
        IOWindow is {$000000A3,$0000003E,$0000028F,$000001EF,$00000000,$00000000,$00000000,$00000000};
    end;
    Name is "b5";
    Enabled is false; Shown is false;
    X is -21; Y is 271;
    AdjustWidth is GetDataWidth; AdjustHeight is GetDataHeight;

    URL is "../Images/BOUTONV2.psd";
    Mode is 260;

end;

object ob68 is cImage
with
    release Editor:
        IOWindow is {$000000A3,$0000003E,$0000028F,$000001EF,$00000000,$00000000,$00000000,$00000000};
    end;
    Name is "b6";
    Enabled is false; Shown is false;
    X is -21; Y is 308;
    AdjustWidth is GetDataWidth; AdjustHeight is GetDataHeight;

    URL is "../Images/BOUTONV2.psd";
    Mode is 260;

end;

object ob79 is cImage
with
    Name is "b7";
    Enabled is false; Shown is false;
    X is -21; Y is 338;
    AdjustWidth is GetDataWidth; AdjustHeight is GetDataHeight;

    URL is "../Images/BOUTONV2.psd";
    Mode is 260;

end;

object ob810 is cImage
with
    Name is "b8";
    Enabled is false; Shown is false;
    X is -21; Y is 364;
    AdjustWidth is GetDataWidth; AdjustHeight is GetDataHeight;

    URL is "../Images/BOUTONV2.psd";
    Mode is 260;

end;

object ob911 is cImage
with
    Name is "b9";
    Enabled is false; Shown is false;
    X is -21; Y is 389;
    AdjustWidth is GetDataWidth; AdjustHeight is GetDataHeight;

    URL is "../Images/BOUTONV2.psd";
    Mode is 260;

end;

object ob1012 is cImage
with
    release Editor:
        IOWindow is {$000000A3,$0000003E,$0000028F,$000001EF,$00000000,$00000000,$00000000,$00000000};
    end;
    Name is "b10";
    Enabled is false; Shown is false;
    X is -21; Y is 412;
    AdjustWidth is GetDataWidth; AdjustHeight is GetDataHeight;

    URL is "../../DATA/Images/BOUTONV2.psd";
    Mode is 260;

end;

object ob1113 is cImage
with
    Name is "b11";
    Enabled is false; Shown is false;
    X is -21; Y is 437;
    AdjustWidth is GetDataWidth; AdjustHeight is GetDataHeight;

    URL is "../../DATA/Images/BOUTONV2.psd";
    Mode is 260;

end;

object ob1214 is cImage
with
    release Editor:
        IOWindow is {$000000A3,$0000003E,$0000028F,$000001EF,$00000000,$00000000,$00000000,$00000000};
    end;
    Name is "b12";
    Enabled is false; Shown is false;
    X is -25; Y is 463;
    AdjustWidth is GetDataWidth; AdjustHeight is GetDataHeight;

    URL is "../Images/BOUTONV2.psd";
    Bitmapped is false; Mode is 260;

end;

object of115 is cBox
with
    release Editor:
        IOWindow is {$000000A3,$0000003E,$0000028F,$000001EF,$00000000,$00000000,$00000000,$00000000};
    end;
    Name is "f1";
    Cursor is oFingerCursor;
    X is -1; Y is 182;
    Width is 162; Height is 27;


    Events is [
        cMouseEnterEvent
        with Flags is $00000004;
            Commands is [
                cShowCommand
                with Flags is $00000004; Target is ob13; end
            ];
        end,
        cMouseLeaveEvent
        with Flags is $00000004;
            Commands is [
                cShowCommand
                with Flags is $00000004; Target is ob13; Mode is Clear; end
            ];
        end,
        cMouseUpEvent
        with Flags is $00000004; Flag is true;
            Commands is [
                cBrowseCommand
                with Flags is $00000004; URL is "e1.k"; end
            ];
        end
    ];
end;

object of216 is cBox
with
    Name is "f2";
    Cursor is oFingerCursor;
    Y is 207;
    Width is 160; Height is 26;


    Events is [
        cMouseEnterEvent
        with
            Commands is [
                cShowCommand
                with Target is ob24; end
            ];
        end,
        cMouseLeaveEvent
        with
            Commands is [
                cShowCommand
                with Target is ob24; Mode is Clear; end
            ];
        end,
        cMouseUpEvent
        with Flag is true;
            Commands is [
                cBrowseCommand
                with URL is "e2.k"; end
            ];
        end
    ];
end;

object of317 is cBox
with
    Flags is $00000150;
    Name is "f3";
    Cursor is oFingerCursor;
    Y is 233;
    Width is 162; Height is 24;


    Events is [
        cMouseEnterEvent
        with Flags is $00000004;
            Commands is [
                cShowCommand
                with Flags is $00000004; Target is ob35; end
            ];
        end,
        cMouseLeaveEvent
        with Flags is $00000004;
            Commands is [
                cShowCommand
                with Flags is $00000004; Target is ob35; Mode is Clear; end
            ];
        end,
        cMouseUpEvent
        with Flags is $00000004; Flag is true;
            Commands is [
                cBrowseCommand
                with Flags is $00000004; URL is "e3.k"; end
            ];
        end
    ];
end;

object of418 is cBox
with
    Name is "f4";
    Cursor is oFingerCursor;
    Y is 255;
    Width is 161; Height is 28;


    Events is [
        cMouseEnterEvent
        with
            Commands is [
                cShowCommand
                with Target is ob46; end
            ];
        end,
        cMouseLeaveEvent
        with
            Commands is [
                cShowCommand
                with Target is ob46; Mode is Clear; end
            ];
        end,
        cMouseUpEvent
        with Flag is true;
            Commands is [
                cBrowseCommand
                with URL is "e4.k"; end
            ];
        end
    ];
end;

object of519 is cBox
with
    Name is "f5";
    Cursor is oFingerCursor;
    Y is 286;
    Width is 163; Height is 28;


    Events is [
        cMouseEnterEvent
        with
            Commands is [
                cShowCommand
                with Target is ob57; end
            ];
        end,
        cMouseLeaveEvent
        with
            Commands is [
                cShowCommand
                with Target is ob57; Mode is Clear; end
            ];
        end,
        cMouseUpEvent
        with Flag is true;
            Commands is [
                cBrowseCommand
                with URL is "e5.k"; end
            ];
        end
    ];
end;

object of620 is cBox
with
    Flags is $00000150;
    Name is "f6";
    Cursor is oFingerCursor;
    Y is 323;
    Width is 163; Height is 28;


    Events is [
        cMouseEnterEvent
        with Flags is $00000004;
            Commands is [
                cShowCommand
                with Flags is $00000004; Target is ob68; end
            ];
        end,
        cMouseLeaveEvent
        with Flags is $00000004;
            Commands is [
                cShowCommand
                with Flags is $00000004; Target is ob68; Mode is Clear; end
            ];
        end,
        cMouseUpEvent
        with Flags is $00000004; Flag is true;
            Commands is [
                cBrowseCommand
                with Flags is $00000004; URL is "e6.k"; end
            ];
        end
    ];
end;

object of721 is cBox
with
    Name is "f7";
    Cursor is oFingerCursor;
    Y is 354;
    Width is 160; Height is 26;


    Events is [
        cMouseEnterEvent
        with
            Commands is [
                cShowCommand
                with Target is ob79; end
            ];
        end,
        cMouseLeaveEvent
        with
            Commands is [
                cShowCommand
                with Target is ob79; Mode is Clear; end
            ];
        end,
        cMouseUpEvent
        with Flag is true;
            Commands is [
                cBrowseCommand
                with URL is "e7.k"; end
            ];
        end
    ];
end;

object of822 is cBox
with
    Name is "f8";
    Cursor is oFingerCursor;
    Y is 378;
    Width is 160; Height is 27;


    Events is [
        cMouseEnterEvent
        with
            Commands is [
                cShowCommand
                with Target is ob810; end
            ];
        end,
        cMouseLeaveEvent
        with
            Commands is [
                cShowCommand
                with Target is ob810; Mode is Clear; end
            ];
        end,
        cMouseUpEvent
        with Flag is true;
            Commands is [
                cBrowseCommand
                with URL is "e8.k"; end
            ];
        end
    ];
end;

object of923 is cBox
with
    Name is "f9";
    Cursor is oFingerCursor;
    Y is 404;
    Width is 163; Height is 25;


    Events is [
        cMouseEnterEvent
        with
            Commands is [
                cShowCommand
                with Target is ob911; end
            ];
        end,
        cMouseLeaveEvent
        with
            Commands is [
                cShowCommand
                with Target is ob911; Mode is Clear; end
            ];
        end,
        cMouseUpEvent
        with Flag is true;
            Commands is [
                cBrowseCommand
                with URL is "e9.k"; end
            ];
        end
    ];
end;

object of1024 is cBox
with
    Name is "f10";
    Cursor is oFingerCursor;
    X is 1; Y is 428;
    Width is 161; Height is 28;


    Events is [
        cMouseEnterEvent
        with
            Commands is [
                cShowCommand
                with Target is ob1012; end
            ];
        end,
        cMouseLeaveEvent
        with
            Commands is [
                cShowCommand
                with Target is ob1012; Mode is Clear; end
            ];
        end,
        cMouseUpEvent
        with Flag is true;
            Commands is [
                cBrowseCommand
                with URL is "e10.k"; end
            ];
        end
    ];
end;

object of1125 is cBox
with
    Flags is $00000150;
    Name is "f11";
    Cursor is oFingerCursor;
    Y is 451;
    Width is 161; Height is 28;


    Events is [
        cMouseEnterEvent
        with Flags is $00000004;
            Commands is [
                cShowCommand
                with Flags is $00000004; Target is ob1113; end
            ];
        end,
        cMouseLeaveEvent
        with Flags is $00000004;
            Commands is [
                cShowCommand
                with Flags is $00000004; Target is ob1113; Mode is Clear; end
            ];
        end,
        cMouseUpEvent
        with Flags is $00000004; Flag is true;
            Commands is [
                cBrowseCommand
                with Flags is $00000004; URL is "e11.k"; end
            ];
        end
    ];
end;

object of1226 is cBox
with
    Flags is $00000150;
    Name is "f12";
    Cursor is oFingerCursor;
    X is -1; Y is 477;
    Width is 162; Height is 27;


    Events is [
        cMouseEnterEvent
        with Flags is $00000004;
            Commands is [
                cShowCommand
                with Flags is $00000004; Target is ob1214; end
            ];
        end,
        cMouseLeaveEvent
        with Flags is $00000004;
            Commands is [
                cShowCommand
                with Flags is $00000004; Target is ob1214; Mode is Clear; end
            ];
        end,
        cMouseUpEvent
        with Flags is $00000004; Flag is true;
            Commands is [
                cBrowseCommand
                with Flags is $00000004; URL is "e12.k"; end
            ];
        end
    ];
end;

object oInternet27 is cBox
with
    Flags is $00000150;
    Name is "Internet";
    Cursor is oEarthCursor;
    X is 260; Y is 540;
    Width is 202; Height is 19;


    Events is [
        cMouseUpEvent
        with Flags is $00000004; Flag is true;
            Commands is [
                cLaunchCommand
                with Flags is $00000004; URL is "http://collateraldamage.warnerbros.com"; URLOption is GetSiteURL; Mode is ExecuteBrowser; end
            ];
        end
    ];
end;

object ol128 is cBox
with
    Flags is $00000150;
    release Editor:
        IOWindow is {$000000AF,$0000003E,$0000028F,$000001EF,$00000000,$00000000,$00000000,$00000000};
    end;
    Name is "l1";
    Cursor is oFingerCursor;
    X is 261; Y is 499;
    Width is 75; Height is 19;


    Events is [
        cMouseUpEvent
        with Flags is $00000004; Flag is true;
            Commands is [
                cIfCookieCommand
                with Flags is $00000004; CookieName is "zique"; Value is "oui";
                    Commands is [
                        cTokenCommand
                        with Flags is $00000004; TokenName is "run"; Mode is ExecuteTargetUpwards; Target is oRoot1; end
                    ];
                end,
                cBrowseCommand
                with Flags is $00000004; URL is "f10.k"; end
            ];
        end
    ];
end;

object ol229 is cBox
with
    Flags is $00000150;
    Name is "l2";
    Cursor is oFingerCursor;
    X is 224; Y is 519;
    Width is 122; Height is 19;


    Events is [
        cMouseUpEvent
        with Flags is $00000004; Flag is true;
            Commands is [
                cIfCookieCommand
                with Flags is $00000004; CookieName is "zique"; Value is "oui";
                    Commands is [
                        cTokenCommand
                        with Flags is $00000004; TokenName is "run"; Mode is ExecuteTargetUpwards; Target is oRoot1; end
                    ];
                end,
                cBrowseCommand
                with Flags is $00000004; URL is "f30.k"; end
            ];
        end
    ];
end;

object oI330 is cBox
with
    Flags is $00000150;
    Name is "I3";
    Cursor is oFingerCursor;
    X is 347; Y is 520;
    Width is 66; Height is 18;


    Events is [
        cMouseUpEvent
        with Flags is $00000004; Flag is true;
            Commands is [
                cIfCookieCommand
                with Flags is $00000004; CookieName is "zique"; Value is "oui";
                    Commands is [
                        cTokenCommand
                        with Flags is $00000004; TokenName is "run"; Mode is ExecuteTargetUpwards; Target is oRoot1; end
                    ];
                end,
                cBrowseCommand
                with Flags is $00000004; URL is "f20.k"; end
            ];
        end
    ];
end;

object oBouton_Fiche32 is cImage
with
    Flags is $00000150;
    Name is "Bouton Fiche";
    Shown is false; Cursor is oFingerCursor;
    X is 167; Y is 573;
    AdjustWidth is GetDataWidth; AdjustHeight is GetDataHeight;

    URL is "../Images/%E9cran%20fiche.jpg";


    Events is [
        cMouseEnterEvent
        with Flags is $00000004;
            Commands is [
                cShowCommand
                with Flags is $00000004; Target is oTargetSelf; end
            ];
        end,
        cMouseLeaveEvent
        with Flags is $00000004;
            Commands is [
                cShowCommand
                with Flags is $00000004; Target is oTargetSelf; Mode is Clear; end
            ];
        end,
        cMouseUpEvent
        with Flags is $00000004; Flag is true;
            Commands is [
                cShowCommand
                with Flags is $00000004; Target is oFiche_Technique37; Mode is Toggle; end,
                cEnableCommand
                with Flags is $00000004; Target is oFiche_Technique37; Mode is Toggle; end
            ];
        end
    ];
end;

object oBouton_Imprimer33 is cImage
with
    Flags is $00000150;
    Name is "Bouton Imprimer";
    Shown is false; Cursor is oFingerCursor;
    X is 321; Y is 573;
    AdjustWidth is GetDataWidth; AdjustHeight is GetDataHeight;

    URL is "../Images/%E9cran%20imprimer.jpg";


    Events is [
        cMouseEnterEvent
        with Flags is $00000004;
            Commands is [
                cShowCommand
                with Flags is $00000004; Target is oTargetSelf; end
            ];
        end,
        cMouseLeaveEvent
        with Flags is $00000004;
            Commands is [
                cShowCommand
                with Flags is $00000004; Target is oTargetSelf; Mode is Clear; end
            ];
        end,
        cMouseUpEvent
        with Flags is $00000004; Flag is true;
            Commands is [
                cPrintCommand
                with Target is oTexte_RTF38; end
            ];
        end
    ];
end;

object oBouton_Sommaire34 is cImage
with
    Name is "Bouton Sommaire";
    Shown is false; Cursor is oFingerCursor;
    X is 13; Y is 573;
    AdjustWidth is GetDataWidth; AdjustHeight is GetDataHeight;

    URL is "../Images/%E9cran%20somm.jpg";


    Events is [
        cMouseEnterEvent
        with
            Commands is [
                cShowCommand
                with Target is oTargetSelf; end
            ];
        end,
        cMouseLeaveEvent
        with
            Commands is [
                cShowCommand
                with Target is oTargetSelf; Mode is Clear; end
            ];
        end,
        cMouseUpEvent
        with Flag is true;
            Commands is [
                cIfCookieCommand
                with CookieName is "zique"; Value is "oui";
                    Commands is [
                        cTokenCommand
                        with TokenName is "run"; Mode is ExecuteTargetUpwards; Target is oRoot1; end
                    ];
                end,
                cBrowseCommand
                with URL is "sommaire.k"; end
            ];
        end
    ];
end;

object oBouton_Photos35 is cImage
with
    Flags is $00000150;
    Name is "Bouton Photos";
    Shown is false; Cursor is oFingerCursor;
    X is 475; Y is 573;
    AdjustWidth is GetDataWidth; AdjustHeight is GetDataHeight;

    URL is "../Images/%E9cran%20photo.jpg";


    Events is [
        cMouseEnterEvent
        with Flags is $00000004;
            Commands is [
                cShowCommand
                with Flags is $00000004; Target is oTargetSelf; end
            ];
        end,
        cMouseLeaveEvent
        with Flags is $00000004;
            Commands is [
                cShowCommand
                with Flags is $00000004; Target is oTargetSelf; Mode is Clear; end
            ];
        end,
        cMouseUpEvent
        with Flags is $00000004; Flag is true;
            Commands is [
                cBrowseCommand
                with URL is "e3s.k"; end
            ];
        end
    ];
end;

object oBouton_Vid_o36 is cImage
with
    Flags is $00000150;
    Name is "Bouton Vid\$E9o";
    Shown is false; Cursor is oFingerCursor;
    X is 629; Y is 573;
    AdjustWidth is GetDataWidth; AdjustHeight is GetDataHeight;

    URL is "../Images/%E9cran%20vid%E9o.jpg";


    Events is [
        cMouseEnterEvent
        with Flags is $00000004;
            Commands is [
                cShowCommand
                with Flags is $00000004; Target is oTargetSelf; end
            ];
        end,
        cMouseLeaveEvent
        with Flags is $00000004;
            Commands is [
                cShowCommand
                with Flags is $00000004; Target is oTargetSelf; Mode is Clear; end
            ];
        end,
        cMouseUpEvent
        with Flags is $00000004; Flag is true;
            Commands is [
                cRunCommand
                with Flags is $00000004; Target is ovid_o39; Mode is Clear; end,
                cEnableCommand
                with Flags is $00000004; Target is ovid_o39; Mode is Clear; end,
                cShowCommand
                with Flags is $00000004; Target is ovid_o39; Mode is Clear; end,
                cDragCommand
                with Flags is $00000004; Target is ovid_o39; Mode is DragTo; end,
                cGrowCommand
                with Flags is $00000004; Target is ovid_o39; Mode is GrowTo; X is 800; Y is 600; end,
                cShowCommand
                with Flags is $00000004; Target is ovid_o39; end,
                cEnableCommand
                with Flags is $00000004; Target is ovid_o39; end,
                cRunCommand
                with Flags is $00000004; Target is ovid_o39; Rewind is true; end,
                cEnableCommand
                with Flags is $00000004; Target is oglobal40; end
            ];
        end
    ];
end;

object oFiche_Technique37 is cImage
with
    Flags is $00000150;
    Name is "Fiche Technique";
    Region is {$FFFF000A,$00010000,$01AC0188};
    Enabled is false; Shown is false; Cursor is oFingerCursor;
    X is 132; Y is 41;
    AdjustWidth is GetDataWidth; AdjustHeight is GetDataHeight;

    URL is "../Images/t3.jpg";


    Events is [
        cMouseUpEvent
        with Flags is $00000004; Flag is true;
            Commands is [
                cShowCommand
                with Flags is $00000004; Target is oFiche_Technique37; Mode is Clear; end,
                cEnableCommand
                with Flags is $00000004; Target is oFiche_Technique37; Mode is Clear; end
            ];
        end
    ];
end;

object oTexte_RTF38 is cRTFText
with
    Flags is $00000550;
    Name is "Texte RTF";
    Enabled is false; Shown is false;
    Y is -160;
    AdjustWidth is GetLayoutWidth; AdjustHeight is GetDataHeight;

    URL is "../Textes/s3.rtf";


end;

object ovid_o39 is cMPEGMovie
with
    Flags is $00008151;
    Name is "vid\$E9o";
    Shown is false; Cursor is oFingerCursor;
    X is 615; Y is 418;
    Width is 176; Height is 144;

    URL is "../Videos/s3.mpg";
    Events is [
        cMouseUpEvent
        with Flags is $00004004; Flag is true;
            Commands is [
                cRunCommand
                with Flags is $00004004; Target is ovid_o39; Mode is Clear; end,
                cEnableCommand
                with Flags is $00004004; Target is ovid_o39; Mode is Clear; end,
                cShowCommand
                with Flags is $00004004; Target is ovid_o39; Mode is Clear; end,
                cDragCommand
                with Flags is $00004004; Target is ovid_o39; Mode is DragTo; end,
                cGrowCommand
                with Flags is $00004004; Target is ovid_o39; Mode is GrowTo; X is 800; Y is 600; end,
                cShowCommand
                with Flags is $00004004; Target is ovid_o39; end,
                cEnableCommand
                with Flags is $00004004; Target is ovid_o39; end,
                cRunCommand
                with Flags is $00004004; Target is ovid_o39; Rewind is true; end,
                cEnableCommand
                with Flags is $00004004; Target is oglobal40; end
            ];
        end,
        cFinishedEvent
        with Flags is $00004004;
            Commands is [
                cPixelTool_IfSystemCommand
                with Flags is $00004004;
                    Commands is [
                        cDragCommand
                        with Flags is $00004004; Target is ovid_o39; Mode is DragTo; X is 631; Y is 442; end,
                        cGrowCommand
                        with Flags is $00004004; Target is ovid_o39; Mode is GrowTo; X is 160; Y is 120; end,
                        cEnableCommand
                        with Flags is $00004004; Target is oglobal40; Mode is Clear; end,
                        cShowCommand
                        with Flags is $00004004; Target is ovid_o39; end,
                        cEnableCommand
                        with Flags is $00004004; Target is ovid_o39; end,
                        cRunCommand
                        with Flags is $00004004; Target is ovid_o39; Rewind is true; end
                    ];
                end,
                cPixelTool_IfSystemCommand
                with Flags is $00004004; SetMode is IsWinTest;
                    Commands is [
                        cDragCommand
                        with Flags is $00004004; Target is ovid_o39; Mode is DragTo; X is 615; Y is 418; end,
                        cGrowCommand
                        with Flags is $00004004; Target is ovid_o39; Mode is GrowTo; X is 176; Y is 144; end,
                        cEnableCommand
                        with Flags is $00004004; Target is oglobal40; Mode is Clear; end,
                        cShowCommand
                        with Flags is $00004004; Target is ovid_o39; end,
                        cEnableCommand
                        with Flags is $00004004; Target is ovid_o39; end,
                        cRunCommand
                        with Flags is $00004004; Target is ovid_o39; Rewind is true; end
                    ];
                end
            ];
        end
    ];
end;

object oglobal40 is cBox
with
    Flags is $00000150;
    Name is "global";
    Enabled is false; Shown is false; Cursor is oEmptyCursor;

    Width is 800; Height is 600;


    Events is [
        cMouseUpEvent
        with Flags is $00000004; Flag is true;
            Commands is [
                cPixelTool_IfSystemCommand
                with Flags is $00000004;
                    Commands is [
                        cShowCommand
                        with Flags is $00000004; Target is ovid_o39; Mode is Clear; end,
                        cRunCommand
                        with Flags is $00000004; Target is ovid_o39; Mode is Clear; Rewind is true; end,
                        cEnableCommand
                        with Flags is $00000004; Target is ovid_o39; Mode is Clear; end,
                        cEnableCommand
                        with Flags is $00000004; Target is oglobal40; Mode is Clear; end,
                        cDragCommand
                        with Flags is $00000004; Target is ovid_o39; Mode is DragTo; X is 631; Y is 442; end,
                        cGrowCommand
                        with Flags is $00000004; Target is ovid_o39; Mode is GrowTo; X is 160; Y is 120; end,
                        cShowCommand
                        with Flags is $00000004; Target is ovid_o39; end,
                        cRunCommand
                        with Flags is $00000004; Target is ovid_o39; Rewind is true; end,
                        cEnableCommand
                        with Flags is $00000004; Target is ovid_o39; end
                    ];
                end,
                cPixelTool_IfSystemCommand
                with Flags is $00000004; SetMode is IsWinTest;
                    Commands is [
                        cShowCommand
                        with Flags is $00000004; Target is ovid_o39; Mode is Clear; end,
                        cRunCommand
                        with Flags is $00000004; Target is ovid_o39; Mode is Clear; Rewind is true; end,
                        cEnableCommand
                        with Flags is $00000004; Target is ovid_o39; Mode is Clear; end,
                        cEnableCommand
                        with Flags is $00000004; Target is oTargetSelf; Mode is Clear; end,
                        cDragCommand
                        with Flags is $00000004; Target is ovid_o39; Mode is DragTo; X is 615; Y is 418; end,
                        cGrowCommand
                        with Flags is $00000004; Target is ovid_o39; Mode is GrowTo; X is 176; Y is 144; end,
                        cShowCommand
                        with Flags is $00000004; Target is ovid_o39; end,
                        cRunCommand
                        with Flags is $00000004; Target is ovid_o39; Rewind is true; end,
                        cEnableCommand
                        with Flags is $00000004; Target is ovid_o39; end
                    ];
                end
            ];
        end
    ];
end;